home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 2010 April
/
PCWorld0410.iso
/
hity wydania
/
Glary Utilities
/
gusetup.exe
/
{app}
/
Integrator.exe
/
RCDATA
/
TFRMMAIN
/
TFRMMAIN.txt
< prev
Wrap
Text File
|
2010-01-14
|
8KB
|
392 lines
object frmmain: Tfrmmain
Left = 212
Top = 192
BorderStyle = bsNone
Caption = 'frmmain'
ClientHeight = 428
ClientWidth = 598
Color = 15724527
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
Scaled = False
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
DesignSize = (
598
428)
PixelsPerInch = 96
TextHeight = 14
object imgfree: TImage
Left = 0
Top = 0
Width = 598
Height = 428
Align = alClient
end
object lblversion: TLabel
Left = 262
Top = 406
Width = 325
Height = 13
Alignment = taRightJustify
Anchors = [akRight, akBottom]
AutoSize = False
Caption = 'Copyright??'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Transparent = True
OnMouseDown = lblversionMouseDown
end
object lbFree: TLabel
Left = 21
Top = 407
Width = 111
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Free for private use'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnMouseDown = lblversionMouseDown
end
object lbUpgrade: TLabel
Left = 148
Top = 407
Width = 77
Height = 13
Cursor = crHandPoint
Anchors = [akLeft, akBottom]
Caption = 'Upgrade Now!'
Color = 15724527
Font.Charset = DEFAULT_CHARSET
Font.Color = 10053120
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold, fsUnderline]
ParentColor = False
ParentFont = False
Transparent = True
OnClick = lbUpgradeClick
end
object lbPortable: TLabel
Left = 245
Top = 407
Width = 93
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Portable Version'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
Visible = False
OnMouseDown = lblversionMouseDown
end
object btnmenu: TimageBtn
Left = 521
Top = 64
Width = 64
Height = 17
Cursor = crHandPoint
Hint = 'Show Menu'
CaptionLeftMargin = 2
FontColor2 = clBlack
Action = actmenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
end
object btnMini: TimageBtn
Left = 541
Top = 11
Width = 21
Height = 17
Cursor = crHandPoint
CaptionLeftMargin = 16
FontColor2 = clBlack
OnClick = BmpButton1Click
end
object btnclose: TimageBtn
Left = 562
Top = 10
Width = 21
Height = 18
Cursor = crHandPoint
CaptionLeftMargin = 16
FontColor2 = clBlack
OnClick = BmpButton2Click
end
object btnoneclick: TimageBtn
Left = 179
Top = 57
Width = 157
Cursor = crHandPoint
GroupIndex = 2
AlignCenter = True
CaptionLeftMargin = 0
FontColor2 = clBlack
Caption = '1-Click Optimizer'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
OnClick = btnoneclickClick
end
object btnmodules: TimageBtn
Left = 335
Top = 57
Width = 157
Cursor = crHandPoint
GroupIndex = 2
AlignCenter = True
CaptionLeftMargin = 0
FontColor2 = clBlack
Caption = 'Tools'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
OnClick = btnmodulesClick
end
object btnStatus: TimageBtn
Left = 23
Top = 57
Width = 157
Cursor = crHandPoint
GroupIndex = 2
AlignCenter = True
CaptionLeftMargin = 0
FontColor2 = clBlack
Caption = 'Status'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
OnClick = btnStatusClick
end
object Notebook1: TNotebook
Left = 11
Top = 112
Width = 579
Height = 273
Color = 15724527
PageIndex = 2
ParentColor = False
TabOrder = 6
object TPage
Left = 0
Top = 0
Caption = 'status'
object pnStatus: TPanel
Left = 0
Top = 0
Width = 579
Height = 273
Align = alClient
BevelOuter = bvNone
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = '1click'
object pn1click: TPanel
Left = 0
Top = 0
Width = 579
Height = 273
Align = alClient
BevelOuter = bvNone
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'modules'
object pnModules: TPanel
Left = 0
Top = 0
Width = 579
Height = 273
Align = alClient
BevelOuter = bvNone
TabOrder = 0
end
end
end
object PopupMenu1: TPopupMenu
Left = 568
Top = 80
object RestoreCenter1: TMenuItem
Action = actRestore
end
object N4: TMenuItem
Caption = '-'
end
object HelpContents1: TMenuItem
Action = actHelp
end
object FAQ1: TMenuItem
Action = actFaq
end
object GlarySoftHomePage1: TMenuItem
Action = actHomepage
end
object N2: TMenuItem
Caption = '-'
end
object Settings1: TMenuItem
Action = actSettings
end
object N7: TMenuItem
Caption = '-'
end
object mnuSkins: TMenuItem
Caption = 'Skins'
end
object N3: TMenuItem
Caption = '-'
end
object About1: TMenuItem
Action = actAbout
end
end
object ActionList1: TActionList
Left = 537
Top = 83
object actHomepage: TAction
Caption = 'GlarySoft Home Page'
OnExecute = actHomepageExecute
end
object actpurchase: TAction
Caption = 'Purchase Now'
Visible = False
OnExecute = actpurchaseExecute
end
object actEntercode: TAction
Caption = 'Enter a Registration Code'
Visible = False
OnExecute = actEntercodeExecute
end
object actAbout: TAction
Caption = 'About'
OnExecute = actAboutExecute
end
object actrecommend: TAction
Caption = 'Recommend to Friends'
Visible = False
OnExecute = actrecommendExecute
end
object actHelp: TAction
Caption = 'Help Contents'
ShortCut = 112
OnExecute = actHelpExecute
end
object actmenu: TAction
Caption = 'Menu'
OnExecute = actmenuExecute
end
object actupdate: TAction
Caption = 'Check for Updates'
end
object actSettings: TAction
Caption = 'Settings'
OnExecute = actSettingsExecute
end
object actRestore: TAction
Caption = 'Restoration Center'
OnExecute = actRestoreExecute
end
object actShowWindow: TAction
Caption = 'Show Window'
OnExecute = actShowWindowExecute
end
object actExit: TAction
Caption = 'Exit'
OnExecute = actExitExecute
end
object actFaq: TAction
Caption = 'FAQ'
OnExecute = actFaqExecute
end
end
object PopupMenu2: TPopupMenu
Left = 367
Top = 358
object ShowWindow1: TMenuItem
Action = actShowWindow
Default = True
end
object Settings2: TMenuItem
Action = actSettings
end
object N1: TMenuItem
Caption = '-'
end
object GlarySoftHomePage2: TMenuItem
Action = actHomepage
end
object HelpContents2: TMenuItem
Action = actHelp
end
object N5: TMenuItem
Caption = '-'
end
object About2: TMenuItem
Action = actAbout
end
object N6: TMenuItem
Caption = '-'
end
object Exit1: TMenuItem
Action = actExit
end
end
object CoolTrayIcon1: TCoolTrayIcon
CycleInterval = 0
Icon.Data = {<image000.ico>}
IconVisible = True
IconIndex = 0
PopupMenu = PopupMenu2
OnClick = CoolTrayIcon1Click
Left = 335
Top = 358
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 403
Top = 360
end
end